inherited fCadCondicaoPagamento: TfCadCondicaoPagamento
  Caption = 'Cadastro de Condi'#231#227'o de Pagamento'
  ClientHeight = 138
  ClientWidth = 362
  OldCreateOrder = True
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel [0]
    Left = 8
    Top = 8
    Width = 48
    Height = 13
    Caption = 'Descri'#231#227'o'
    FocusControl = dbDescricao
  end
  object Label3: TLabel [1]
    Left = 8
    Top = 48
    Width = 71
    Height = 13
    Caption = 'N'#176' de Parcelas'
  end
  object Label1: TLabel [2]
    Left = 96
    Top = 48
    Width = 75
    Height = 13
    Caption = 'Dias entre parc.'
  end
  object Label4: TLabel [3]
    Left = 184
    Top = 48
    Width = 37
    Height = 13
    Caption = 'Entrada'
  end
  inherited GroupBox1: TGroupBox
    Left = -120
    Top = 88
    TabOrder = 6
  end
  inherited BitBtn1: TBitBtn
    Left = 192
    Top = 104
    TabOrder = 4
    OnClick = BitBtn1Click
  end
  inherited BitBtn2: TBitBtn
    Left = 280
    Top = 104
    TabOrder = 5
    OnClick = BitBtn2Click
  end
  object dbDescricao: TDBEdit
    Left = 8
    Top = 24
    Width = 345
    Height = 21
    CharCase = ecUpperCase
    DataField = 'DESCRICAO'
    DataSource = DataSource1
    TabOrder = 0
  end
  object edNparcelas: TRxSpinEdit
    Left = 8
    Top = 64
    Width = 73
    Height = 21
    TabOrder = 1
  end
  object edDiasParc: TRxSpinEdit
    Left = 96
    Top = 64
    Width = 73
    Height = 21
    TabOrder = 2
  end
  object RxDBComboBox1: TRxDBComboBox
    Left = 184
    Top = 64
    Width = 68
    Height = 21
    DataField = 'ENTRADA'
    DataSource = DataSource1
    EnableValues = False
    ItemHeight = 13
    Items.Strings = (
      'SIM'
      'NAO')
    TabOrder = 3
    Values.Strings = (
      'SIM'
      'NAO')
  end
  object DataSource1: TDataSource
    DataSet = dm.qryCondPgto
    Left = 312
    Top = 56
  end
  object GeraCodigo: TIBOQuery
    Params = <>
    DatabaseName = 'C:\Delphi7\Integrado\Dados\BANCO.GDB'
    IB_Connection = dm.base
    RecordCountAccurate = True
    SQL.Strings = (
      'select GEN_ID(GEN_CONDICAO_PGTO_ID,1) PK FROM RDB$DATABASE')
    FieldOptions = []
    Left = 140
    Top = 105
    object GeraCodigoPK: TLargeintField
      FieldName = 'PK'
      ReadOnly = True
      Required = True
    end
  end
end
